﻿Imports Microsoft.VisualBasic

Public Class SemaforoAutobus



    Private strAutobus As String
    Private strLitros As String
    Private strKilometros As String
    Private strMeta As String
    Private strFactorRendimiento As String
    Private strFactorAmarillo As String

    Public Property Autobus As String
        Get
            Return strAutobus
        End Get
        Set(ByVal value As String)
            strAutobus = value
        End Set
    End Property

    Public Property Litros As String
        Get
            Return strLitros
        End Get
        Set(ByVal value As String)
            strLitros = value
        End Set
    End Property

    Public Property Kilometros As String
        Get
            Return strKilometros
        End Get
        Set(ByVal value As String)
            strKilometros = value
        End Set
    End Property

    Public Property Meta As String
        Get
            Return strMeta
        End Get
        Set(ByVal value As String)
            strMeta = value
        End Set
    End Property

    Public Property FactorRendimiento As String
        Get
            Return strFactorRendimiento
        End Get
        Set(ByVal value As String)
            strFactorRendimiento = value
        End Set
    End Property

    Public Property FactorAmarillo As String
        Get
            Return strFactorAmarillo
        End Get
        Set(ByVal value As String)
            strFactorAmarillo = value
        End Set
    End Property





End Class